home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Hyper / S-Sh / Shell Stack 3.0.cpt / Shell Stack 3.0 / Shell Stack 3.0 / card_3174.txt < prev    next >
Encoding:
Text File  |  1987-12-20  |  7.7 KB  |  391 lines
  1. -- card: 3174 from stack: in.0
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2799
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0000
  11. -- rect: left=131 top=70 right=99 bottom=364
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 2
  16. -- text size: 24
  17. -- style flags: 0
  18. -- line height: 32
  19. -- part name: Card Name (4)
  20.  
  21.  
  22. -- part 2 (button)
  23. -- low flags: 00
  24. -- high flags: 0000
  25. -- rect: left=17 top=111 right=145 bottom=55
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 1006 / 1006
  28. -- text alignment: 1
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: Quit
  34. ----- HyperTalk script -----
  35. on mouseUp
  36.   Answer "Quit! Are you sure?" with "No" or "Yes"
  37.   if it is "Yes" then DoMenu Quit HyperCard
  38. end mouseUp
  39.  
  40.  
  41.  
  42. -- part 3 (button)
  43. -- low flags: 00
  44. -- high flags: 0000
  45. -- rect: left=17 top=147 right=181 bottom=55
  46. -- title width / last selected line: 0
  47. -- icon id / first selected line: 1008 / 1008
  48. -- text alignment: 1
  49. -- font id: 0
  50. -- text size: 12
  51. -- style flags: 0
  52. -- line height: 16
  53. -- part name: Print Card
  54. ----- HyperTalk script -----
  55. on mouseUp
  56.   DoMenu Print Stack...
  57. end mouseUp
  58.  
  59.  
  60.  
  61. -- part 4 (button)
  62. -- low flags: 00
  63. -- high flags: 0000
  64. -- rect: left=17 top=183 right=217 bottom=55
  65. -- title width / last selected line: 0
  66. -- icon id / first selected line: 32462 / 32462
  67. -- text alignment: 1
  68. -- font id: 0
  69. -- text size: 12
  70. -- style flags: 0
  71. -- line height: 16
  72. -- part name: Help
  73. ----- HyperTalk script -----
  74. on mouseUp
  75.   Go to stack "Help"
  76. end mouseUp
  77.  
  78.  
  79.  
  80. -- part 5 (button)
  81. -- low flags: 00
  82. -- high flags: 0000
  83. -- rect: left=17 top=219 right=253 bottom=55
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 32670 / 32670
  86. -- text alignment: 1
  87. -- font id: 0
  88. -- text size: 12
  89. -- style flags: 0
  90. -- line height: 16
  91. -- part name: Quick Cards
  92. ----- HyperTalk script -----
  93. on mouseUp
  94.   push card
  95.   Show all cards
  96.   pop card
  97. end mouseUp
  98.  
  99.  
  100.  
  101. -- part 6 (button)
  102. -- low flags: 00
  103. -- high flags: 0000
  104. -- rect: left=17 top=255 right=289 bottom=55
  105. -- title width / last selected line: 0
  106. -- icon id / first selected line: 20186 / 20186
  107. -- text alignment: 1
  108. -- font id: 0
  109. -- text size: 12
  110. -- style flags: 0
  111. -- line height: 16
  112. -- part name: Recent
  113. ----- HyperTalk script -----
  114. on mouseUp
  115.   doMenu Recent
  116. end mouseUp
  117.  
  118.  
  119.  
  120. -- part 7 (button)
  121. -- low flags: 00
  122. -- high flags: 0000
  123. -- rect: left=176 top=111 right=145 bottom=214
  124. -- title width / last selected line: 0
  125. -- icon id / first selected line: 17343 / 17343
  126. -- text alignment: 1
  127. -- font id: 0
  128. -- text size: 12
  129. -- style flags: 0
  130. -- line height: 16
  131. -- part name: Transfer
  132. ----- HyperTalk script -----
  133. on mouseUp
  134.   Open Your Application
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 8 (button)
  140. -- low flags: 00
  141. -- high flags: 0000
  142. -- rect: left=176 top=147 right=181 bottom=214
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 1007 / 1007
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: Print Report
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   DoMenu Print Report...
  154. end mouseUp
  155.  
  156.  
  157.  
  158. -- part 9 (button)
  159. -- low flags: 00
  160. -- high flags: 0000
  161. -- rect: left=176 top=183 right=217 bottom=214
  162. -- title width / last selected line: 0
  163. -- icon id / first selected line: 18814 / 18814
  164. -- text alignment: 1
  165. -- font id: 0
  166. -- text size: 12
  167. -- style flags: 0
  168. -- line height: 16
  169. -- part name: UserLevel
  170. ----- HyperTalk script -----
  171. on mouseUp
  172.   show background field "US"
  173.   Ask "Set User Level to:" with "5"
  174.   set UserLevel to it
  175.   hide background field "US"
  176. end mouseUp
  177.  
  178.  
  179.  
  180. -- part 10 (button)
  181. -- low flags: 00
  182. -- high flags: 0000
  183. -- rect: left=176 top=219 right=253 bottom=214
  184. -- title width / last selected line: 0
  185. -- icon id / first selected line: 1000 / 1000
  186. -- text alignment: 1
  187. -- font id: 0
  188. -- text size: 12
  189. -- style flags: 0
  190. -- line height: 16
  191. -- part name: Open Stack
  192. ----- HyperTalk script -----
  193. on mouseUp
  194.   doMenu Open Stack...
  195. end mouseUp
  196.  
  197.  
  198.  
  199. -- part 11 (button)
  200. -- low flags: 00
  201. -- high flags: 0000
  202. -- rect: left=176 top=255 right=289 bottom=214
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 17481 / 17481
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: Open Card
  211. ----- HyperTalk script -----
  212. on mouseUp
  213.   Ask "Goto Card Number:" with "1"
  214.   go to card it
  215. end mouseUp
  216.  
  217.  
  218.  
  219. -- part 12 (button)
  220. -- low flags: 00
  221. -- high flags: 0000
  222. -- rect: left=326 top=111 right=145 bottom=364
  223. -- title width / last selected line: 0
  224. -- icon id / first selected line: 3430 / 3430
  225. -- text alignment: 1
  226. -- font id: 0
  227. -- text size: 12
  228. -- style flags: 0
  229. -- line height: 16
  230. -- part name: New Card
  231. ----- HyperTalk script -----
  232. on mouseUp
  233.   set UserLevel to 5
  234.   doMenu New Card
  235.   set UserLevel to 5
  236. end mouseUp
  237.  
  238.  
  239.  
  240. -- part 13 (button)
  241. -- low flags: 00
  242. -- high flags: 0000
  243. -- rect: left=326 top=147 right=181 bottom=364
  244. -- title width / last selected line: 0
  245. -- icon id / first selected line: 1009 / 1009
  246. -- text alignment: 1
  247. -- font id: 0
  248. -- text size: 12
  249. -- style flags: 0
  250. -- line height: 16
  251. -- part name: About HyperCard
  252. ----- HyperTalk script -----
  253. on mouseUp
  254.   doMenu About HyperCard...
  255. end mouseUp
  256.  
  257.  
  258.  
  259. -- part 14 (button)
  260. -- low flags: 00
  261. -- high flags: 0000
  262. -- rect: left=326 top=183 right=217 bottom=364
  263. -- title width / last selected line: 0
  264. -- icon id / first selected line: 10610 / 10610
  265. -- text alignment: 1
  266. -- font id: 0
  267. -- text size: 12
  268. -- style flags: 0
  269. -- line height: 16
  270. -- part name: Dial
  271. ----- HyperTalk script -----
  272. on mouseUp
  273.   Answer "Shall I Dial Through:" with "Speaker" or "Modem"
  274.   if it is "Modem" then
  275.     Ask "Dial the number:" with ""
  276.     dial it with modem "ATDT"
  277.   End If
  278.  
  279.   If it is "Speaker" then
  280.     Ask "Dial the number:" with ""
  281.     dial it
  282.   End If
  283.  
  284. End MouseUp
  285.  
  286.  
  287.  
  288. -- part 15 (button)
  289. -- low flags: 00
  290. -- high flags: 0000
  291. -- rect: left=326 top=219 right=253 bottom=364
  292. -- title width / last selected line: 0
  293. -- icon id / first selected line: 11645 / 11645
  294. -- text alignment: 1
  295. -- font id: 0
  296. -- text size: 12
  297. -- style flags: 0
  298. -- line height: 16
  299. -- part name: Stack Info
  300. ----- HyperTalk script -----
  301. on mouseUp
  302.   set UserLevel to 5
  303.   doMenu Stack Info...
  304.   set UserLevel to 1
  305. end mouseUp
  306.  
  307.  
  308.  
  309. -- part 16 (button)
  310. -- low flags: 00
  311. -- high flags: 0000
  312. -- rect: left=326 top=255 right=278 bottom=361
  313. -- title width / last selected line: 0
  314. -- icon id / first selected line: 1011 / 1011
  315. -- text alignment: 1
  316. -- font id: 0
  317. -- text size: 12
  318. -- style flags: 0
  319. -- line height: 16
  320. -- part name: Home
  321. ----- HyperTalk script -----
  322. on mouseUp
  323.   go home
  324. end mouseUp
  325.  
  326.  
  327.  
  328. -- part 17 (field)
  329. -- low flags: 01
  330. -- high flags: 0000
  331. -- rect: left=56 top=112 right=295 bottom=480
  332. -- title width / last selected line: 0
  333. -- icon id / first selected line: 0 / 0
  334. -- text alignment: 0
  335. -- font id: 4
  336. -- text size: 9
  337. -- style flags: 0
  338. -- line height: 12
  339. -- part name: Decription
  340.  
  341.  
  342. -- part contents for background part 3
  343. ----- text -----
  344. 7:28 PM
  345.  
  346. -- part contents for background part 2
  347. ----- text -----
  348. Saturday, December 19, 1987
  349.  
  350. -- part contents for background part 1
  351. ----- text -----
  352. Card:
  353.  
  354. -- part contents for background part 5
  355. ----- text -----
  356. 4
  357.  
  358. -- part contents for card part 1
  359. ----- text -----
  360. Button Reference
  361.  
  362. -- part contents for card part 17
  363. ----- text -----
  364.  
  365. Quit to Finder             Transfer to Appl        New Card
  366.  
  367.  
  368. Print Stack                Print Report            About HyperCard
  369.  
  370.  
  371. Help Stack                 Set UserLevel           Dial the Phone
  372.  
  373.  
  374. Quick Browse               Open Stack              Show Stack Info
  375.  
  376.  
  377. Goto Recent Card           Goto Card               Goto Home Stack
  378.       Also Try the Buttons at the Bottom Corners of the Screen
  379.       
  380.  
  381. -- part contents for background part 45
  382. ----- text -----
  383. Total Cards:
  384.  
  385. -- part contents for background part 43
  386. ----- text -----
  387. 8
  388.  
  389. -- part contents for background part 42
  390. ----- text -----
  391. Typing